10 DATA 228,162,208,6,32,225,255,208
20 DATA 247,96,138,74,144,3,238,0
30 DATA 208,166,162,24,173,131,32,105
40 DATA 5,141,131,32,173,130,32,105
50 DATA 0,141,130,32,24,173,131,32
60 DATA 109,129,32,141,129,32,173,130
70 DATA 32,109,128,32,141,128,32,141
80 DATA 1,208,201,240,144,194,173,130
90 DATA 32,48,189,78,130,32,46,131
100 DATA 32,173,130,32,208,7,173,131
110 DATA 32,201,5,144,19,56,169,0
120 DATA 237,131,32,141,131,32,169,0
130 DATA 237,130,32,141,130,32,144,159,96
135 PRINT"[147]":POKE53280,14:POKE53281,6:POKE646,14
140 FORJ=8192TO8296:READA:X=X+A:POKEJ,A:NEXT:IFX<>11758THENSTOP
150 FORJ=704TO766:POKEJ,0:NEXT:FORJ=704TO710STEP3:POKEJ,255:NEXT:REM SPRITE
170 POKE2040,11:REM POINT TO SPRITE DATA
180 POKE53248,0:POKE53249,60:REM LOCATE SPRITE 0 AT (0,60)
190 POKE53287,2:POKE53269,1:REM COLOR SPRITE 0 AND TURN IT ON
210 POKE8320,60:POKE8321,0:REM INITIALIZE Y POSITION
220 POKE8322,0:POKE8323,0:REM INITIALIZE Y VELOCITY
230 SYS 8192
240 POKE53269,0:REM TURN OFF SPRITE 0